object FrmInf_DevParc: TFrmInf_DevParc
  Left = 267
  Top = 140
  BorderIcons = []
  BorderStyle = bsSingle
  Caption = 'T'#237'tulos rerferentes'
  ClientHeight = 398
  ClientWidth = 512
  Color = clBtnFace
  Font.Charset = ANSI_CHARSET
  Font.Color = clWindowText
  Font.Height = -11
  Font.Name = 'Arial'
  Font.Style = [fsBold]
  OldCreateOrder = False
  Position = poOwnerFormCenter
  OnActivate = FormActivate
  OnClose = FormClose
  PixelsPerInch = 96
  TextHeight = 14
  object l_tdev: TLabel
    Left = 144
    Top = 374
    Width = 59
    Height = 14
    Caption = 'Total Dev.: '
    Font.Charset = ANSI_CHARSET
    Font.Color = clNavy
    Font.Height = -11
    Font.Name = 'Arial'
    Font.Style = [fsBold]
    ParentFont = False
  end
  object DBGrid: TDBGrid
    Left = 0
    Top = 0
    Width = 512
    Height = 361
    Align = alTop
    DataSource = ds
    TabOrder = 0
    TitleFont.Charset = ANSI_CHARSET
    TitleFont.Color = clWindowText
    TitleFont.Height = -11
    TitleFont.Name = 'Arial'
    TitleFont.Style = [fsBold]
    OnKeyDown = DBGridKeyDown
    OnKeyPress = DBGridKeyPress
    Columns = <
      item
        Expanded = False
        FieldName = 'tipo_doc'
        ReadOnly = True
        Title.Caption = 'TD'
        Visible = True
      end
      item
        Expanded = False
        FieldName = 'num_docto'
        ReadOnly = True
        Title.Caption = 'Num.T'#237'tulo'
        Visible = True
      end
      item
        Expanded = False
        FieldName = 'data_venc'
        ReadOnly = True
        Title.Caption = 'Data Vencto'
        Visible = True
      end
      item
        Expanded = False
        FieldName = 'valor'
        ReadOnly = True
        Title.Caption = 'Valor'
        Width = 84
        Visible = True
      end
      item
        Expanded = False
        FieldName = 'saldo'
        ReadOnly = True
        Title.Caption = 'Saldo'
        Width = 83
        Visible = True
      end
      item
        Color = clSilver
        Expanded = False
        FieldName = 'valor_dev'
        Title.Caption = 'Valor Dev.'
        Width = 85
        Visible = True
      end>
  end
  object BitBtn1: TBitBtn
    Left = 296
    Top = 368
    Width = 97
    Height = 25
    Caption = 'Ok'
    TabOrder = 1
    OnClick = BitBtn1Click
    Glyph.Data = {
      76010000424D7601000000000000760000002800000020000000100000000100
      04000000000000010000120B0000120B00001000000000000000000000000000
      800000800000008080008000000080008000808000007F7F7F00BFBFBF000000
      FF0000FF000000FFFF00FF000000FF00FF00FFFF0000FFFFFF00555555555555
      555555555555555555555555555555555555555555FF55555555555559055555
      55555555577FF5555555555599905555555555557777F5555555555599905555
      555555557777FF5555555559999905555555555777777F555555559999990555
      5555557777777FF5555557990599905555555777757777F55555790555599055
      55557775555777FF5555555555599905555555555557777F5555555555559905
      555555555555777FF5555555555559905555555555555777FF55555555555579
      05555555555555777FF5555555555557905555555555555777FF555555555555
      5990555555555555577755555555555555555555555555555555}
    NumGlyphs = 2
  end
  object BitBtn2: TBitBtn
    Left = 400
    Top = 368
    Width = 97
    Height = 25
    Caption = 'Cancelar'
    TabOrder = 2
    OnClick = BitBtn2Click
    Glyph.Data = {
      DE010000424DDE01000000000000760000002800000024000000120000000100
      0400000000006801000000000000000000001000000000000000000000000000
      80000080000000808000800000008000800080800000C0C0C000808080000000
      FF0000FF000000FFFF00FF000000FF00FF00FFFF0000FFFFFF00333333333333
      333333333333333333333333000033338833333333333333333F333333333333
      0000333911833333983333333388F333333F3333000033391118333911833333
      38F38F333F88F33300003339111183911118333338F338F3F8338F3300003333
      911118111118333338F3338F833338F3000033333911111111833333338F3338
      3333F8330000333333911111183333333338F333333F83330000333333311111
      8333333333338F3333383333000033333339111183333333333338F333833333
      00003333339111118333333333333833338F3333000033333911181118333333
      33338333338F333300003333911183911183333333383338F338F33300003333
      9118333911183333338F33838F338F33000033333913333391113333338FF833
      38F338F300003333333333333919333333388333338FFF830000333333333333
      3333333333333333333888330000333333333333333333333333333333333333
      0000}
    NumGlyphs = 2
  end
  object b_calcular: TBitBtn
    Left = 5
    Top = 368
    Width = 124
    Height = 25
    Caption = 'Calcular Aut.'
    TabOrder = 3
    OnClick = b_calcularClick
    Glyph.Data = {
      76010000424D7601000000000000760000002800000020000000100000000100
      04000000000000010000120B0000120B00001000000000000000000000000000
      800000800000008080008000000080008000808000007F7F7F00BFBFBF000000
      FF0000FF000000FFFF00FF000000FF00FF00FFFF0000FFFFFF00337000000000
      73333337777777773F333308888888880333337F3F3F3FFF7F33330808089998
      0333337F737377737F333308888888880333337F3F3F3F3F7F33330808080808
      0333337F737373737F333308888888880333337F3F3F3F3F7F33330808080808
      0333337F737373737F333308888888880333337F3F3F3F3F7F33330808080808
      0333337F737373737F333308888888880333337F3FFFFFFF7F33330800000008
      0333337F7777777F7F333308000E0E080333337F7FFFFF7F7F33330800000008
      0333337F777777737F333308888888880333337F333333337F33330888888888
      03333373FFFFFFFF733333700000000073333337777777773333}
    NumGlyphs = 2
  end
  object pnlBotao: TPanel
    Left = 457
    Top = 3
    Width = 24
    Height = 17
    BevelOuter = bvNone
    TabOrder = 4
    object SpeedButton1: TSpeedButton
      Left = 0
      Top = 0
      Width = 23
      Height = 17
      Caption = '='
      OnClick = SpeedButton1Click
    end
  end
  object md: TRxMemoryData
    FieldDefs = <>
    Left = 208
    Top = 160
    object mdtipo_doc: TStringField
      FieldName = 'tipo_doc'
      Size = 1
    end
    object mdnum_docto: TStringField
      FieldName = 'num_docto'
    end
    object mddata_venc: TDateField
      FieldName = 'data_venc'
    end
    object mdvalor: TFloatField
      FieldName = 'valor'
      DisplayFormat = '0.00'
    end
    object mdsaldo: TFloatField
      FieldName = 'saldo'
      DisplayFormat = '0.00'
    end
    object mdvalor_dev: TFloatField
      FieldName = 'valor_dev'
      DisplayFormat = '0.00'
    end
    object mdnqf: TStringField
      FieldName = 'nqf'
      Size = 1
    end
    object mdnota1: TStringField
      FieldName = 'nota1'
      Size = 9
    end
    object mdnota2: TStringField
      FieldName = 'nota2'
      Size = 9
    end
  end
  object ds: TDataSource
    DataSet = md
    Left = 240
    Top = 160
  end
end
